OutputDevice(What,[iAdditive]) --> nil:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
Clipper output device is switched to monitor, printer or file.

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
What:      can obtain values OD_SCREEN, OD_PRINTER (screen output,
           or printer output - the object.ch defined constants)
           or can be a file name to redirect the output
lAdditive: logical variable to supress the screen output

Return value:
~~~~~~~~~~~~~
procedure returns nil

Example:
~~~~~~~~
    OutputDevice(OD_PRINTER)
    ? "WE ARE PRINTING TO PRINTER..."
    OutputDevice(OD_SCREEN)
    ? "WE ARE PRINTING TO THE SCREEN..."
    OutputDevice("text.txt")
    ? "WE ARE PRINTING TO A FILE..."

Source code is in file  object3.prg.